home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / T-TPUG Old Monthly Disks / (c)tp.d64 / america.c (.txt) next >
Commodore BASIC  |  2007-02-11  |  32KB  |  909 lines
  1. 100 REM WRITTEN MAY 19,1984
  2. 102 REM DARREN BOYD
  3. 104 REM BOX 522
  4. 106 REM NELSON, B.C.
  5. 108 REM V1L 5R3
  6. 110 REM D.B. PRODUCTIONS
  7. 120 POKE53281,0
  8. 130 POKE53280,11
  9. 140 PRINT"[147]"
  10. 150 PRINTTAB(5)"FROM THE MOVIE THE JAZZ SINGER"
  11. 160 PRINTTAB(16)"[159]AMERICA"
  12. 170 PRINTTAB(12)"BY: NEIL DIAMOND"
  13. 180 V=15
  14. 190 FORI=54272TO54296:POKEI,0:NEXTI
  15. 200 FORPA=1TO500:NEXTPA
  16. 210 L1=54272:L2=54279:L3=54286
  17. 220 H1=L1+1:H2=L2+1:H3=L3+1
  18. 230 V1=L1+4:V2=L2+4:V3=L3+4
  19. 240 POKE54296,V
  20. 250 POKEV1+1,063:POKEV1+2,048:POKE54275,002:POKE54274,127
  21. 260 POKEV2+1,063:POKEV2+2,001:POKE54282,012:POKE54281,127
  22. 270 POKEV3+1,063:POKEV3+2,001:POKE54289,012:POKE54288,127
  23. 280 T=TI
  24. 290 POKEV1,(65-W1):POKEV2,(65-W2):POKEV3,(65-W3)
  25. 300 READS:IFS=0GOTO400
  26. 310 IFS=-5THENV=V-5:POKE54296,V:GOTO300
  27. 320 S=INT(S/1.6)
  28. 330 READ X1,Y1,X2,Y2,X3,Y3,W1,W2,W3
  29. 340 IFX1THENPOKEH1,X1:POKEL1,Y1:POKEV1,65
  30. 350 IFX2THENPOKEH2,X2:POKEL2,Y2:POKEV2,65
  31. 360 IFX3THENPOKEH3,X3:POKEL3,Y3:POKEV3,65
  32. 370 T=T+S
  33. 380 IFT>TIGOTO380
  34. 390 GOTO 290
  35. 400 FORPA=1TO750:NEXTPA
  36. 410 FORJ=L1 TO 54296:POKE J,0:NEXT J
  37. 420 GOTO9040
  38. 430 REM MEASURE 01
  39. 440 DATA020,000,000,000,000,002,163,1,1,1
  40. 450 DATA040,000,000,000,000,002,204,1,1,1
  41. 460 DATA020,000,000,000,000,002,204,1,1,1
  42. 470 DATA020,000,000,000,000,002,204,1,1,1
  43. 480 DATA040,000,000,000,000,002,204,1,1,1
  44. 490 DATA020,000,000,000,000,002,204,1,1,1
  45. 500 REM MEASURE 02
  46. 510 DATA020,000,000,000,000,002,163,1,1,1
  47. 520 DATA040,000,000,000,000,002,204,1,1,1
  48. 530 DATA020,000,000,000,000,002,204,1,1,1
  49. 540 DATA020,000,000,000,000,002,204,1,1,1
  50. 550 DATA040,000,000,000,000,002,204,1,1,1
  51. 560 DATA020,000,000,000,000,002,204,1,1,1
  52. 570 REM MEASURE 03
  53. 580 DATA020,000,000,000,000,002,163,1,1,1
  54. 590 DATA040,000,000,000,000,002,204,1,1,1
  55. 600 DATA020,000,000,000,000,002,204,1,1,1
  56. 610 DATA020,000,000,000,000,002,204,1,1,1
  57. 620 DATA040,000,000,000,000,002,204,1,1,1
  58. 630 DATA020,000,000,000,000,002,204,1,1,1
  59. 640 REM MEASURE 04
  60. 650 DATA020,000,000,000,000,002,163,1,1,1
  61. 660 DATA040,000,000,000,000,002,204,1,1,1
  62. 670 DATA020,000,000,000,000,002,204,1,1,1
  63. 680 DATA020,000,000,000,000,002,204,1,1,1
  64. 690 DATA040,000,000,000,000,002,204,1,1,1
  65. 700 DATA020,000,000,000,000,002,204,1,1,1
  66. 710 REM MEASURE 05
  67. 720 DATA020,000,000,000,000,002,163,1,1,1
  68. 730 DATA020,022,096,000,000,002,204,0,1,0
  69. 740 DATA020,021,031,000,000,002,204,0,1,1
  70. 750 DATA020,022,096,000,000,002,204,0,1,1
  71. 760 DATA020,016,195,000,000,002,204,0,1,1
  72. 770 DATA040,016,195,000,000,002,204,0,1,1
  73. 780 DATA020,022,096,000,000,002,204,0,1,1
  74. 790 REM MEASURE 06
  75. 800 DATA020,021,031,000,000,002,163,0,1,1
  76. 810 DATA020,022,096,000,000,002,204,0,1,0
  77. 820 DATA020,016,195,000,000,002,204,0,1,1
  78. 830 DATA020,016,195,000,000,002,204,0,1,1
  79. 840 DATA020,016,195,000,000,002,204,0,1,1
  80. 850 DATA040,016,195,000,000,002,204,0,1,1
  81. 860 DATA020,016,195,000,000,002,204,1,1,1
  82. 870 REM MEASURE 07
  83. 880 DATA020,000,000,000,000,002,163,1,1,1
  84. 890 DATA020,028,049,022,096,002,204,0,0,0
  85. 900 DATA020,025,030,021,031,002,204,0,0,1
  86. 910 DATA020,028,049,022,096,002,204,0,0,1
  87. 920 DATA020,029,223,025,030,002,204,0,0,1
  88. 930 DATA020,028,049,022,096,002,204,0,0,0
  89. 940 DATA020,025,030,021,031,002,204,0,0,1
  90. 950 DATA020,028,049,022,096,002,204,1,1,1
  91. 960 REM MEASURE 08
  92. 970 DATA020,000,000,000,000,002,163,1,1,1
  93. 980 DATA020,028,049,022,096,002,204,0,0,0
  94. 990 DATA020,025,030,021,031,002,204,0,0,1
  95. 1000 DATA020,028,049,022,096,002,204,0,0,1
  96. 1010 DATA020,029,223,025,030,002,204,0,0,1
  97. 1020 DATA020,028,049,022,096,002,204,0,0,0
  98. 1030 DATA020,025,030,021,031,002,204,0,0,1
  99. 1040 DATA020,028,049,022,096,002,204,1,1,1
  100. 1050 REM MEASURE 09
  101. 1060 DATA020,016,195,014,024,002,163,0,1,1
  102. 1070 DATA020,016,195,011,048,002,204,0,1,0
  103. 1080 DATA020,016,195,010,143,002,204,0,1,1
  104. 1090 DATA020,016,195,011,048,002,204,1,1,1
  105. 1100 DATA020,000,000,008,097,002,204,1,0,1
  106. 1110 DATA040,000,000,008,097,002,204,1,1,1
  107. 1120 DATA020,000,000,011,048,002,204,1,1,1
  108. 1130 REM MEASURE 10
  109. 1140 DATA020,000,000,010,143,002,163,1,1,1
  110. 1150 DATA020,011,048,011,048,002,204,1,1,0
  111. 1160 DATA020,014,024,008,097,002,204,1,0,1
  112. 1170 DATA020,016,195,008,097,002,204,0,0,1
  113. 1180 DATA020,016,195,008,097,002,204,1,0,1
  114. 1190 DATA020,011,048,008,097,002,204,1,0,0
  115. 1200 DATA020,014,024,008,097,002,204,1,0,1
  116. 1210 DATA020,016,195,008,097,002,204,0,1,1
  117. 1220 REM MEASURE 11
  118. 1230 DATA020,016,195,000,000,002,163,0,1,1
  119. 1240 DATA020,016,195,011,048,002,204,1,0,0
  120. 1250 DATA020,000,000,010,143,002,204,1,0,1
  121. 1260 DATA020,000,000,011,048,002,204,1,0,1
  122. 1270 DATA020,000,000,008,097,002,204,1,0,1
  123. 1280 DATA040,000,000,008,097,002,204,1,0,1
  124. 1290 DATA020,000,000,011,048,002,204,1,0,1
  125. 1300 REM MEASURE 12
  126. 1310 DATA020,000,000,012,143,002,163,1,0,1
  127. 1320 DATA020,000,000,011,048,002,204,1,0,0
  128. 1330 DATA020,022,096,008,097,002,204,1,0,1
  129. 1340 DATA020,016,195,008,097,002,204,0,0,1
  130. 1350 DATA020,016,195,008,097,002,204,1,0,1
  131. 1360 DATA040,014,239,008,097,002,204,1,0,1
  132. 1370 DATA020,014,024,011,048,002,204,0,1,1
  133. 1380 REM MEASURE 13
  134. 1390 DATA020,014,024,000,000,002,163,0,1,1
  135. 1400 DATA020,014,024,011,048,002,204,1,0,0
  136. 1410 DATA020,000,000,010,143,002,204,1,0,1
  137. 1420 DATA020,000,000,011,048,002,204,1,0,1
  138. 1430 DATA020,000,000,008,097,002,204,1,0,1
  139. 1440 DATA040,000,000,008,097,002,204,1,0,1
  140. 1450 DATA020,000,000,011,048,002,204,1,0,1
  141. 1460 REM MEASURE 14
  142. 1470 DATA020,000,000,012,143,002,163,1,0,1
  143. 1480 DATA020,011,048,011,048,002,204,1,0,0
  144. 1490 DATA020,014,239,008,097,002,204,1,0,1
  145. 1500 DATA020,014,024,008,097,002,204,1,0,1
  146. 1510 DATA020,011,048,008,097,002,204,1,0,1
  147. 1520 DATA040,009,104,008,097,002,204,1,0,1
  148. 1530 DATA020,011,048,011,048,002,204,0,1,1
  149. 1540 REM MEASURE 15
  150. 1550 DATA020,011,048,000,000,002,163,0,1,1
  151. 1560 DATA020,011,048,014,024,002,204,1,0,0
  152. 1570 DATA020,000,000,012,143,002,204,1,0,1
  153. 1580 DATA020,000,000,014,024,002,204,1,0,1
  154. 1590 DATA020,000,000,014,239,002,204,1,0,1
  155. 1600 DATA020,000,000,014,024,002,204,1,0,0
  156. 1610 DATA020,000,000,012,143,002,204,1,0,1
  157. 1620 DATA020,000,000,014,024,002,204,1,1,1
  158. 1630 REM MEASURE 16
  159. 1640 DATA020,000,000,000,000,002,163,1,1,1
  160. 1650 DATA020,000,000,014,024,002,204,1,0,0
  161. 1660 DATA020,000,000,012,143,002,204,1,0,1
  162. 1670 DATA020,000,000,014,024,002,204,1,0,1
  163. 1680 DATA020,000,000,014,239,002,204,1,0,1
  164. 1690 DATA020,000,000,014,024,002,204,1,0,0
  165. 1700 DATA020,000,000,012,143,002,204,1,0,1
  166. 1710 DATA020,000,000,014,024,002,204,1,0,1
  167. 1720 REM MEASURE 17
  168. 1730 DATA020,016,195,000,000,002,163,0,1,1
  169. 1740 DATA020,016,195,011,048,002,204,0,0,0
  170. 1750 DATA020,016,195,010,143,002,204,0,0,1
  171. 1760 DATA020,016,195,011,048,002,204,1,0,1
  172. 1770 DATA020,000,000,008,097,002,204,1,0,1
  173. 1780 DATA040,000,000,008,097,002,204,1,0,1
  174. 1790 DATA020,000,000,011,048,002,204,1,0,1
  175. 1800 REM MEASURE 18
  176. 1810 DATA020,000,000,010,143,002,163,1,0,1
  177. 1820 DATA020,011,048,011,048,002,204,0,0,0
  178. 1830 DATA020,014,024,008,097,002,204,0,0,1
  179. 1840 DATA020,016,195,008,097,002,204,0,0,1
  180. 1850 DATA020,016,195,008,097,002,204,1,0,1
  181. 1860 DATA020,011,048,008,097,002,204,1,0,0
  182. 1870 DATA020,014,024,008,097,002,204,1,0,1
  183. 1880 DATA020,016,195,008,097,002,204,0,1,1
  184. 1890 REM MEASURE 19
  185. 1900 DATA020,016,195,000,000,002,163,0,1,1
  186. 1910 DATA020,016,195,011,048,002,204,1,0,0
  187. 1920 DATA020,000,000,010,143,002,204,1,0,1
  188. 1930 DATA020,000,000,011,048,002,204,1,0,1
  189. 1940 DATA020,000,000,008,097,002,204,1,0,1
  190. 1950 DATA040,000,000,008,097,002,204,1,0,1
  191. 1960 DATA020,000,000,011,048,002,204,1,0,1
  192. 1970 REM MEASURE 20
  193. 1980 DATA020,000,000,012,143,002,163,1,0,1
  194. 1990 DATA020,000,000,011,048,002,204,1,0,0
  195. 2000 DATA020,022,096,008,097,002,204,1,0,1
  196. 2010 DATA020,016,195,008,097,002,204,0,0,1
  197. 2020 DATA020,016,195,008,097,002,204,1,0,1
  198. 2030 DATA040,014,239,008,097,002,204,1,0,1
  199. 2040 DATA020,014,024,008,097,002,204,0,1,1
  200. 2050 REM MEASURE 21
  201. 2060 DATA020,014,024,000,000,002,163,0,1,1
  202. 2070 DATA020,014,024,011,048,002,204,1,0,0
  203. 2080 DATA020,000,000,010,143,002,204,1,0,1
  204. 2090 DATA020,000,000,011,048,002,204,1,0,1
  205. 2100 DATA020,000,000,008,097,002,204,1,0,1
  206. 2110 DATA040,000,000,008,097,002,204,1,0,1
  207. 2120 DATA020,000,000,011,048,002,204,1,0,1
  208. 2130 REM MEASURE 22
  209. 2140 DATA020,000,000,012,143,002,163,1,0,1
  210. 2150 DATA020,000,000,011,048,002,204,1,0,0
  211. 2160 DATA020,014,239,008,097,002,204,1,0,1
  212. 2170 DATA020,014,024,008,097,002,204,0,0,1
  213. 2180 DATA020,014,024,008,097,002,204,1,0,1
  214. 2190 DATA020,011,048,008,097,002,204,1,0,0
  215. 2200 DATA020,009,104,008,097,002,204,1,0,1
  216. 2210 DATA020,011,048,008,097,002,204,0,1,1
  217. 2220 REM MEASURE 23
  218. 2230 DATA020,011,048,000,000,002,163,0,1,1
  219. 2240 DATA020,011,048,014,024,002,204,1,0,0
  220. 2250 DATA020,000,000,012,143,002,204,1,0,1
  221. 2260 DATA020,000,000,014,024,002,204,1,0,1
  222. 2270 DATA020,000,000,014,239,002,204,1,0,1
  223. 2280 DATA020,000,000,014,024,002,204,1,0,0
  224. 2290 DATA020,000,000,012,143,002,204,1,0,1
  225. 2300 DATA020,000,000,014,024,002,204,1,1,1
  226. 2310 REM MEASURE 24
  227. 2320 DATA020,000,000,000,000,002,163,1,1,1
  228. 2330 DATA020,000,000,014,024,002,204,1,0,0
  229. 2340 DATA020,000,000,012,143,002,204,1,0,1
  230. 2350 DATA020,000,000,014,024,002,204,1,0,1
  231. 2360 DATA020,000,000,014,239,002,204,1,0,1
  232. 2370 DATA020,000,000,014,024,002,204,1,0,0
  233. 2380 DATA020,000,000,012,143,002,204,1,0,1
  234. 2390 DATA020,000,000,014,024,002,204,1,1,1
  235. 2400 REM MEASURE 25
  236. 2410 DATA020,000,000,000,000,002,246,1,1,1
  237. 2420 DATA020,000,000,000,000,003,035,1,1,0
  238. 2430 DATA020,012,143,000,000,003,035,1,1,1
  239. 2440 DATA020,015,210,000,000,003,035,1,1,1
  240. 2450 DATA020,018,209,015,210,003,035,0,0,1
  241. 2460 DATA020,018,209,015,210,003,035,1,1,0
  242. 2470 DATA020,012,143,000,000,003,035,1,1,1
  243. 2480 DATA020,015,210,012,143,003,035,0,0,1
  244. 2490 REM MEASURE 26
  245. 2500 DATA020,015,210,012,143,002,246,1,1,1
  246. 2510 DATA020,016,195,014,024,003,035,1,1,0
  247. 2520 DATA020,018,209,015,210,003,035,0,0,1
  248. 2530 DATA020,018,209,015,210,003,035,1,1,1
  249. 2540 DATA020,000,000,000,000,003,035,1,1,1
  250. 2550 DATA040,000,000,000,000,003,035,1,1,1
  251. 2560 DATA020,000,000,000,000,003,035,1,1,1
  252. 2570 REM MEASURE 27
  253. 2580 DATA020,000,000,000,000,002,246,1,1,1
  254. 2590 DATA020,000,000,000,000,003,035,1,1,0
  255. 2600 DATA020,025,030,015,210,003,035,1,1,1
  256. 2610 DATA020,018,209,015,210,003,035,0,0,1
  257. 2620 DATA020,018,209,015,210,003,035,1,1,1
  258. 2630 DATA020,018,209,015,210,003,035,1,1,0
  259. 2640 DATA020,016,195,014,024,003,035,1,1,1
  260. 2650 DATA020,015,210,012,143,003,035,1,1,1
  261. 2660 REM MEASURE 28
  262. 2670 DATA020,016,195,014,024,002,246,1,1,1
  263. 2680 DATA020,015,210,012,143,003,035,1,1,0
  264. 2690 DATA020,012,143,009,104,003,035,0,0,1
  265. 2700 DATA020,012,143,009,104,003,035,1,1,1
  266. 2710 DATA020,000,000,000,000,003,035,1,1,1
  267. 2720 DATA040,000,000,000,000,003,035,1,1,1
  268. 2730 DATA020,000,000,000,000,003,035,1,1,1
  269. 2740 REM MEASURE 29
  270. 2750 DATA020,000,000,000,000,002,246,1,1,1
  271. 2760 DATA020,012,143,000,000,003,035,1,1,0
  272. 2770 DATA020,015,210,000,000,003,035,1,1,1
  273. 2780 DATA020,018,209,015,210,003,035,0,0,1
  274. 2790 DATA020,018,209,015,210,003,035,1,1,1
  275. 2800 DATA040,015,210,012,143,003,035,1,1,1
  276. 2810 DATA020,016,195,014,024,003,035,0,0,1
  277. 2820 REM MEASURE 30
  278. 2830 DATA020,016,195,014,024,002,246,1,1,1
  279. 2840 DATA020,015,210,012,143,003,035,1,1,0
  280. 2850 DATA020,018,209,015,210,003,035,0,0,1
  281. 2860 DATA020,018,209,015,210,003,035,1,1,1
  282. 2870 DATA020,000,000,000,000,003,035,1,1,1
  283. 2880 DATA040,000,000,000,000,003,035,1,1,1
  284. 2890 DATA020,000,000,000,000,003,035,1,1,1
  285. 2900 REM MEASURE 31
  286. 2910 DATA020,000,000,000,000,002,246,1,1,1
  287. 2920 DATA020,000,000,000,000,003,035,1,1,0
  288. 2930 DATA020,025,030,015,210,003,035,1,1,1
  289. 2940 DATA020,018,209,015,210,003,035,0,0,1
  290. 2950 DATA020,018,209,015,210,003,035,1,1,1
  291. 2960 DATA020,018,209,015,210,003,035,1,1,0
  292. 2970 DATA020,016,195,014,024,003,035,1,1,1
  293. 2980 DATA020,015,210,015,210,003,035,1,1,1
  294. 2990 REM MEASURE 32
  295. 3000 DATA020,016,195,014,024,002,246,1,1,1
  296. 3010 DATA020,015,210,012,143,003,035,1,1,0
  297. 3020 DATA020,015,210,012,143,003,035,0,0,1
  298. 3030 DATA020,015,210,012,143,003,035,1,1,1
  299. 3040 DATA040,000,000,000,000,006,071,1,1,1
  300. 3050 DATA040,000,000,000,000,005,237,1,1,1
  301. 3060 REM MEASURE 33
  302. 3070 DATA040,021,031,000,000,005,071,0,1,1
  303. 3080 DATA040,021,031,000,000,005,071,1,1,1
  304. 3090 DATA040,000,000,015,210,005,071,1,0,1
  305. 3100 DATA040,000,000,015,210,005,071,1,0,1
  306. 3110 REM MEASURE 34
  307. 3120 DATA040,000,000,015,210,005,071,1,0,1
  308. 3130 DATA020,000,000,015,210,005,071,1,0,0
  309. 3140 DATA010,021,031,015,210,005,071,1,0,0
  310. 3150 DATA010,021,031,015,210,005,071,1,0,1
  311. 3160 DATA040,025,030,015,210,005,071,1,1,1
  312. 3170 DATA040,028,049,018,209,005,237,1,1,1
  313. 3180 REM MEASURE 35
  314. 3190 DATA010,031,165,000,000,006,071,1,1,0
  315. 3200 DATA010,031,165,000,000,006,071,1,1,0
  316. 3210 DATA020,031,165,000,000,006,071,1,1,1
  317. 3220 DATA040,000,000,000,000,006,071,1,1,1
  318. 3230 DATA040,000,000,025,030,006,071,1,0,1
  319. 3240 DATA040,000,000,025,030,006,071,1,0,1
  320. 3250 REM MEASURE 36
  321. 3260 DATA040,000,000,025,030,006,071,1,0,1
  322. 3270 DATA020,000,000,025,030,006,071,1,0,0
  323. 3280 DATA010,018,209,025,030,006,071,1,0,0
  324. 3290 DATA010,018,209,025,030,006,071,1,0,1
  325. 3300 DATA020,033,135,025,030,006,071,1,0,0
  326. 3310 DATA020,033,135,025,030,006,071,1,0,1
  327. 3320 DATA040,031,165,025,030,006,071,1,1,1
  328. 3330 REM MEASURE 37
  329. 3340 DATA030,037,162,022,096,004,180,1,0,0
  330. 3350 DATA010,028,049,022,096,004,180,1,0,1
  331. 3360 DATA040,028,049,022,096,004,180,1,1,1
  332. 3370 DATA040,000,000,022,096,004,180,1,0,1
  333. 3380 DATA040,000,000,022,096,004,180,1,0,1
  334. 3390 REM MEASURE 38
  335. 3400 DATA040,000,000,022,096,004,180,1,0,1
  336. 3410 DATA020,000,000,022,096,004,180,1,0,0
  337. 3420 DATA010,018,209,022,096,004,180,1,0,0
  338. 3430 DATA010,018,209,022,096,004,180,1,0,1
  339. 3440 DATA020,033,135,022,096,004,180,1,0,0
  340. 3450 DATA020,033,135,022,096,004,180,1,0,1
  341. 3460 DATA020,031,165,022,096,004,180,1,0,0
  342. 3470 DATA020,028,049,022,096,004,180,0,1,1
  343. 3480 REM MEASURE 39
  344. 3490 DATA040,028,049,000,000,005,152,1,1,1
  345. 3500 DATA040,000,000,000,000,005,152,1,1,1
  346. 3510 DATA040,000,000,016,195,005,152,1,0,1
  347. 3520 DATA040,000,000,016,195,005,152,1,0,1
  348. 3530 REM MEASURE 40
  349. 3540 DATA040,000,000,016,195,005,152,1,0,1
  350. 3550 DATA020,000,000,016,195,005,152,1,0,0
  351. 3560 DATA010,016,195,016,195,005,152,1,0,0
  352. 3570 DATA010,016,195,016,195,005,152,1,0,1
  353. 3580 DATA020,025,030,016,195,005,152,1,0,0
  354. 3590 DATA020,025,030,016,195,005,152,1,0,1
  355. 3600 DATA020,022,096,016,195,005,152,1,0,0
  356. 3610 DATA020,021,031,016,195,005,152,0,1,1
  357. 3620 REM MEASURE 41
  358. 3630 DATA040,021,031,015,210,005,071,1,0,1
  359. 3640 DATA040,000,000,015,210,005,071,1,0,1
  360. 3650 DATA040,000,000,015,210,005,071,1,0,1
  361. 3660 DATA040,000,000,015,210,005,237,1,0,1
  362. 3670 REM MEASURE 42
  363. 3680 DATA040,000,000,015,210,005,071,1,0,1
  364. 3690 DATA040,000,000,015,210,005,071,1,0,1
  365. 3700 DATA040,000,000,015,210,005,071,1,0,1
  366. 3710 DATA040,000,000,015,210,005,071,1,1,1
  367. 3720 REM MEASURE 43
  368. 3730 DATA040,021,031,000,000,005,071,0,1,1
  369. 3740 DATA040,021,031,000,000,005,071,1,1,1
  370. 3750 DATA040,000,000,015,210,005,071,1,0,1
  371. 3760 DATA040,000,000,015,210,005,071,1,0,1
  372. 3770 REM MEASURE 44
  373. 3780 DATA040,000,000,015,210,005,071,1,0,1
  374. 3790 DATA020,000,000,015,210,005,071,1,0,0
  375. 3800 DATA010,021,031,015,210,005,071,1,0,0
  376. 3810 DATA010,021,031,015,210,005,071,1,0,1
  377. 3820 DATA020,025,030,015,210,005,071,1,0,0
  378. 3830 DATA020,025,030,015,210,005,071,1,1,1
  379. 3840 DATA020,028,049,018,209,005,237,1,0,0
  380. 3850 DATA020,031,165,018,209,005,237,1,1,1
  381. 3860 REM MEASURE 45
  382. 3870 DATA020,031,165,000,000,006,071,1,1,0
  383. 3880 DATA020,031,165,000,000,006,071,1,1,1
  384. 3890 DATA040,000,000,000,000,006,071,1,1,1
  385. 3900 DATA040,000,000,025,030,006,071,1,0,1
  386. 3910 DATA040,000,000,025,030,006,071,1,0,1
  387. 3920 REM MEASURE 46
  388. 3930 DATA040,000,000,025,030,006,071,1,0,1
  389. 3940 DATA020,031,165,025,030,006,071,1,0,0
  390. 3950 DATA020,031,165,025,030,006,071,1,0,1
  391. 3960 DATA020,033,135,025,030,006,071,1,0,0
  392. 3970 DATA020,033,135,025,030,006,071,1,0,1
  393. 3980 DATA020,031,165,025,030,006,071,1,0,0
  394. 3990 DATA020,037,162,028,049,006,071,1,1,1
  395. 4000 REM MEASURE 47
  396. 4010 DATA020,037,162,028,049,004,180,1,0,0
  397. 4020 DATA020,037,162,028,049,004,180,1,0,1
  398. 4030 DATA040,000,000,028,049,004,180,1,1,1
  399. 4040 DATA040,000,000,028,049,004,180,1,0,1
  400. 4050 DATA040,000,000,028,049,004,180,1,0,1
  401. 4060 REM MEASURE 48
  402. 4070 DATA040,000,000,028,049,004,180,1,0,1
  403. 4080 DATA020,033,135,028,049,004,180,1,0,0
  404. 4090 DATA020,033,135,028,049,004,180,1,0,1
  405. 4100 DATA040,033,135,028,049,004,180,1,0,1
  406. 4110 DATA020,031,165,028,049,004,180,1,0,0
  407. 4120 DATA020,028,049,028,049,004,180,1,1,1
  408. 4130 REM MEASURE 49
  409. 4140 DATA040,028,049,000,000,005,152,1,1,1
  410. 4150 DATA040,000,000,000,000,005,152,1,1,1
  411. 4160 DATA040,000,000,022,096,005,152,1,0,1
  412. 4170 DATA040,000,000,022,096,005,152,1,0,1
  413. 4180 REM MEASURE 50
  414. 4190 DATA040,000,000,022,096,005,152,1,0,1
  415. 4200 DATA010,031,165,022,096,005,152,1,0,0
  416. 4210 DATA030,028,049,022,096,005,152,1,0,1
  417. 4220 DATA027,025,030,022,096,005,152,1,0,0
  418. 4230 DATA013,025,030,022,096,005,152,0,0,1
  419. 4240 DATA013,025,030,022,096,005,152,1,0,0
  420. 4250 DATA027,022,096,022,096,005,152,1,1,1
  421. 4260 REM MEASURE 51
  422. 4270 DATA040,021,031,015,210,005,071,0,0,1
  423. 4280 DATA040,021,031,015,210,005,071,1,0,1
  424. 4290 DATA040,000,000,015,210,005,071,1,0,1
  425. 4300 DATA040,000,000,015,210,005,071,1,0,1
  426. 4310 REM MEASURE 52
  427. 4320 DATA040,000,000,015,210,005,071,1,0,1
  428. 4330 DATA040,000,000,015,210,005,071,1,0,1
  429. 4340 DATA040,000,000,015,210,005,071,1,0,1
  430. 4350 DATA040,000,000,015,210,005,071,1,1,1
  431. 4360 REM MEASURE 53
  432. 4370 DATA020,000,000,000,000,002,163,1,1,1
  433. 4380 DATA020,022,096,000,000,002,204,0,1,0
  434. 4390 DATA020,021,031,000,000,002,204,0,1,1
  435. 4400 DATA020,022,096,000,000,002,204,0,1,1
  436. 4410 DATA020,016,195,000,000,002,204,0,1,1
  437. 4420 DATA040,016,195,000,000,002,204,0,1,1
  438. 4430 DATA020,022,096,000,000,002,204,0,1,1
  439. 4440 REM MEASURE 54
  440. 4450 DATA020,021,031,000,000,002,163,0,1,1
  441. 4460 DATA020,022,096,000,000,002,204,0,1,0
  442. 4470 DATA020,016,195,000,000,002,204,0,1,1
  443. 4480 DATA020,016,195,000,000,002,204,0,1,1
  444. 4490 DATA020,016,195,000,000,002,204,0,1,1
  445. 4500 DATA040,016,195,000,000,002,204,0,1,1
  446. 4510 DATA020,016,195,000,000,002,204,1,1,1
  447. 4520 REM MEASURE 55
  448. 4530 DATA020,000,000,000,000,002,163,1,1,1
  449. 4540 DATA020,022,096,014,024,002,204,0,0,0
  450. 4550 DATA020,021,031,012,143,002,204,0,0,1
  451. 4560 DATA020,022,096,014,024,002,204,0,0,1
  452. 4570 DATA020,025,030,014,239,002,204,0,0,1
  453. 4580 DATA020,022,096,014,024,002,204,0,0,0
  454. 4590 DATA020,021,031,012,143,002,204,0,0,1
  455. 4600 DATA020,022,096,014,024,002,204,1,1,1
  456. 4610 REM MEASURE 56
  457. 4620 DATA020,000,000,000,000,002,163,1,1,1
  458. 4630 DATA020,022,096,014,024,002,204,0,0,0
  459. 4640 DATA020,021,031,012,143,002,204,0,0,1
  460. 4650 DATA020,022,096,014,024,002,204,0,0,1
  461. 4660 DATA020,025,030,014,239,002,204,0,0,1
  462. 4670 DATA020,022,096,014,024,002,204,0,0,0
  463. 4680 DATA020,021,031,012,143,002,204,0,0,1
  464. 4690 DATA020,022,096,014,024,002,204,1,1,1
  465. 4700 REM MEASURE 57
  466. 4710 DATA020,000,000,000,000,002,163,1,1,1
  467. 4720 DATA020,000,000,000,000,002,204,1,1,0
  468. 4730 DATA020,011,048,000,000,002,204,1,1,1
  469. 4740 DATA020,014,024,000,000,002,204,1,1,1
  470. 4750 DATA020,016,195,014,024,002,204,0,0,1
  471. 4760 DATA020,016,195,014,024,002,204,1,1,0
  472. 4770 DATA020,011,048,000,000,002,204,1,1,1
  473. 4780 DATA020,014,024,011,048,002,204,0,0,1
  474. 4790 REM MEASURE 58
  475. 4800 DATA020,014,024,011,048,002,163,1,1,1
  476. 4810 DATA020,014,239,012,143,002,204,1,1,0
  477. 4820 DATA020,016,195,014,024,002,204,0,0,1
  478. 4830 DATA020,016,195,014,024,002,204,1,1,1
  479. 4840 DATA020,000,000,000,000,002,204,1,1,1
  480. 4850 DATA040,000,000,000,000,002,204,1,1,1
  481. 4860 DATA020,000,000,000,000,002,204,1,1,1
  482. 4870 REM MEASURE 59
  483. 4880 DATA020,000,000,000,000,002,163,1,1,1
  484. 4890 DATA020,000,000,000,000,002,204,1,1,0
  485. 4900 DATA020,022,096,014,024,002,204,1,1,1
  486. 4910 DATA020,016,195,014,024,002,204,0,0,1
  487. 4920 DATA020,016,195,014,024,002,204,1,1,1
  488. 4930 DATA020,016,195,014,024,002,204,1,1,0
  489. 4940 DATA020,014,239,012,143,002,204,1,1,1
  490. 4950 DATA020,014,024,011,048,002,204,1,1,1
  491. 4960 REM MEASURE 60
  492. 4970 DATA020,014,239,012,143,002,163,1,1,1
  493. 4980 DATA020,014,024,011,048,002,204,1,1,0
  494. 4990 DATA020,011,048,008,097,002,204,0,0,1
  495. 5000 DATA020,011,048,008,097,002,204,1,1,1
  496. 5010 DATA020,000,000,000,000,002,204,1,1,1
  497. 5020 DATA040,000,000,000,000,002,204,1,1,1
  498. 5030 DATA020,000,000,000,000,002,204,1,1,1
  499. 5040 REM MEASURE 61
  500. 5050 DATA020,000,000,000,000,002,163,1,1,1
  501. 5060 DATA020,011,048,000,000,002,204,1,1,0
  502. 5070 DATA020,014,024,011,048,002,204,1,1,1
  503. 5080 DATA020,016,195,014,024,002,204,0,0,1
  504. 5090 DATA020,016,195,014,024,002,204,1,1,1
  505. 5100 DATA040,011,048,008,097,002,204,1,1,1
  506. 5110 DATA020,014,024,011,048,002,204,0,0,1
  507. 5120 REM MEASURE 62
  508. 5130 DATA020,014,024,011,048,002,163,1,1,1
  509. 5140 DATA040,014,239,012,143,002,204,1,1,1
  510. 5150 DATA020,016,195,014,024,002,204,0,0,1
  511. 5160 DATA020,016,195,014,024,002,204,0,0,1
  512. 5170 DATA020,016,195,014,024,002,204,1,1,0
  513. 5180 DATA020,000,000,000,000,002,204,1,1,1
  514. 5190 DATA020,000,000,000,000,002,204,1,1,1
  515. 5200 REM MEASURE 63
  516. 5210 DATA020,000,000,000,000,002,163,1,1,1
  517. 5220 DATA020,000,000,000,000,002,204,1,1,0
  518. 5230 DATA020,022,096,014,024,002,204,1,1,1
  519. 5240 DATA020,016,195,014,024,002,204,0,0,1
  520. 5250 DATA020,016,195,014,024,002,204,1,1,1
  521. 5260 DATA020,016,195,014,024,002,204,1,1,0
  522. 5270 DATA020,014,239,012,143,002,204,1,1,1
  523. 5280 DATA020,014,024,011,048,002,204,1,1,1
  524. 5290 REM MEASURE 64
  525. 5300 DATA020,014,239,012,143,002,163,1,1,1
  526. 5310 DATA020,014,024,011,048,002,204,1,1,0
  527. 5320 DATA020,011,048,008,097,002,204,0,0,1
  528. 5330 DATA020,011,048,008,097,002,204,1,1,1
  529. 5340 DATA020,000,000,000,000,002,204,1,1,1
  530. 5350 DATA040,000,000,000,000,002,204,1,1,1
  531. 5360 DATA020,000,000,000,000,002,204,1,1,1
  532. 5370 REM MEASURE 65
  533. 5380 DATA020,000,000,000,000,002,246,1,1,1
  534. 5390 DATA020,000,000,000,000,003,035,1,1,0
  535. 5400 DATA020,012,143,000,000,003,035,1,1,1
  536. 5410 DATA020,015,210,000,000,003,035,1,1,1
  537. 5420 DATA020,018,209,015,210,003,035,0,0,1
  538. 5430 DATA020,018,209,015,210,003,035,1,1,0
  539. 5440 DATA020,012,143,000,000,003,035,1,1,1
  540. 5450 DATA020,015,210,012,143,003,035,0,0,1
  541. 5460 REM MEASURE 66
  542. 5470 DATA020,015,210,012,143,002,246,1,1,1
  543. 5480 DATA020,016,195,014,024,003,035,1,1,0
  544. 5490 DATA020,018,209,015,210,003,035,0,0,1
  545. 5500 DATA020,018,209,015,210,003,035,1,1,1
  546. 5510 DATA020,000,000,000,000,003,035,1,1,1
  547. 5520 DATA040,000,000,000,000,003,035,1,1,1
  548. 5530 DATA020,000,000,000,000,003,035,1,1,1
  549. 5540 REM MEASURE 67
  550. 5550 DATA020,000,000,000,000,002,246,1,1,1
  551. 5560 DATA020,000,000,000,000,003,035,1,1,0
  552. 5570 DATA020,025,030,015,210,003,035,1,1,1
  553. 5580 DATA020,018,209,015,210,003,035,0,0,1
  554. 5590 DATA020,018,209,015,210,003,035,1,1,1
  555. 5600 DATA020,018,209,015,210,003,035,1,1,0
  556. 5610 DATA020,016,195,014,024,003,035,1,1,1
  557. 5620 DATA020,015,210,012,143,003,035,1,1,1
  558. 5630 REM MEASURE 68
  559. 5640 DATA020,016,195,014,024,002,246,1,1,1
  560. 5650 DATA020,015,210,012,143,003,035,1,1,0
  561. 5660 DATA020,015,210,012,143,003,035,0,0,1
  562. 5670 DATA020,015,210,012,143,003,035,1,1,1
  563. 5680 DATA020,000,000,000,000,003,035,1,1,1
  564. 5690 DATA040,000,000,000,000,003,035,1,1,1
  565. 5700 DATA020,000,000,000,000,003,035,1,1,1
  566. 5710 REM MEASURE 69
  567. 5720 DATA020,000,000,000,000,002,246,1,1,1
  568. 5730 DATA020,012,143,000,000,003,035,1,1,0
  569. 5740 DATA020,015,210,000,000,003,035,1,1,1
  570. 5750 DATA020,018,209,015,210,003,035,0,0,1
  571. 5760 DATA020,018,209,015,210,003,035,1,1,1
  572. 5770 DATA040,015,210,012,143,003,035,1,1,1
  573. 5780 DATA020,016,195,014,024,003,035,0,0,1
  574. 5790 REM MEASURE 70
  575. 5800 DATA020,016,195,014,024,002,246,1,1,1
  576. 5810 DATA020,015,210,012,143,003,035,1,1,0
  577. 5820 DATA020,018,209,015,210,003,035,0,0,1
  578. 5830 DATA020,018,209,015,210,003,035,1,1,1
  579. 5840 DATA020,000,000,000,000,003,035,1,1,1
  580. 5850 DATA040,000,000,000,000,003,035,1,1,1
  581. 5860 DATA020,000,000,000,000,003,035,1,1,1
  582. 5870 REM MEASURE 71
  583. 5880 DATA020,000,000,000,000,002,246,1,1,1
  584. 5890 DATA020,000,000,000,000,003,035,1,1,0
  585. 5900 DATA020,025,030,015,210,003,035,1,1,1
  586. 5910 DATA020,018,209,015,210,003,035,0,0,1
  587. 5920 DATA020,018,209,015,210,003,035,1,1,1
  588. 5930 DATA020,018,209,015,210,003,035,1,1,0
  589. 5940 DATA020,016,195,014,024,003,035,1,1,1
  590. 5950 DATA020,015,210,012,143,003,035,1,1,1
  591. 5960 REM MEASURE 72
  592. 5970 DATA020,016,195,014,024,002,246,1,1,1
  593. 5980 DATA020,015,210,012,143,003,035,1,1,0
  594. 5990 DATA020,015,210,012,143,003,035,0,0,1
  595. 6000 DATA020,015,210,012,143,003,035,1,1,1
  596. 6010 DATA020,000,000,000,000,003,035,1,1,1
  597. 6020 DATA040,000,000,000,000,003,035,1,1,1
  598. 6030 DATA020,000,000,000,000,003,035,1,1,1
  599. 6040 REM MEASURE 73
  600. 6050 DATA020,000,000,014,024,003,035,1,0,1
  601. 6060 DATA020,000,000,014,024,003,134,1,0,0
  602. 6070 DATA020,021,031,014,024,003,134,1,0,1
  603. 6080 DATA020,018,209,014,024,003,134,0,0,1
  604. 6090 DATA020,018,209,014,024,003,134,1,0,1
  605. 6100 DATA020,018,209,014,024,003,134,1,0,0
  606. 6110 DATA020,018,209,014,024,003,134,1,0,1
  607. 6120 DATA020,017,195,014,024,003,134,1,0,1
  608. 6130 REM MEASURE 74
  609. 6140 DATA020,018,209,014,024,003,083,1,0,1
  610. 6150 DATA020,017,195,014,024,003,134,1,0,0
  611. 6160 DATA020,014,024,014,024,003,134,0,0,1
  612. 6170 DATA020,014,024,014,024,003,134,1,0,1
  613. 6180 DATA020,000,000,014,024,003,134,1,0,1
  614. 6190 DATA040,000,000,014,024,003,134,1,0,1
  615. 6200 DATA020,000,000,014,024,003,134,1,1,1
  616. 6210 REM MEASURE 75
  617. 6220 DATA020,000,000,028,049,005,237,1,0,1
  618. 6230 DATA020,000,000,028,049,005,237,1,0,0
  619. 6240 DATA020,042,062,028,049,005,237,1,0,1
  620. 6250 DATA020,037,162,028,049,005,237,0,0,1
  621. 6260 DATA020,037,162,028,049,005,237,1,0,1
  622. 6270 DATA020,037,162,028,049,005,237,1,0,0
  623. 6280 DATA020,037,162,028,049,005,237,1,0,1
  624. 6290 DATA020,035,134,028,049,005,237,1,0,1
  625. 6300 REM MEASURE 76
  626. 6310 DATA020,037,162,028,049,005,237,1,0,1
  627. 6320 DATA020,035,134,028,049,005,237,1,0,0
  628. 6330 DATA020,028,049,028,049,005,237,0,0,1
  629. 6340 DATA020,028,049,028,049,005,237,1,0,1
  630. 6350 DATA020,000,000,028,049,005,237,1,0,1
  631. 6360 DATA040,000,000,028,049,005,237,1,0,1
  632. 6370 DATA020,000,000,028,049,005,237,1,1,1
  633. 6380 REM MEASURE 77
  634. 6390 DATA020,000,000,028,049,004,180,1,0,1
  635. 6400 DATA020,000,000,028,049,004,180,1,0,0
  636. 6410 DATA020,042,062,028,049,004,180,1,0,1
  637. 6420 DATA020,037,162,028,049,004,180,0,0,1
  638. 6430 DATA020,037,162,028,049,004,180,1,0,1
  639. 6440 DATA020,037,162,028,049,004,180,1,0,0
  640. 6450 DATA020,037,162,028,049,004,180,1,0,1
  641. 6460 DATA020,035,134,028,049,004,180,1,0,1
  642. 6470 REM MEASURE 78
  643. 6480 DATA020,037,162,028,049,004,180,1,0,1
  644. 6490 DATA020,035,134,028,049,004,180,1,0,0
  645. 6500 DATA020,028,049,028,049,004,180,0,0,1
  646. 6510 DATA020,028,049,028,049,004,180,1,0,1
  647. 6520 DATA020,000,000,028,049,004,180,1,0,1
  648. 6530 DATA040,000,000,028,049,004,180,1,0,1
  649. 6540 DATA020,000,000,028,049,004,180,1,1,1
  650. 6550 REM MEASURE 79
  651. 6560 DATA020,000,000,028,049,007,233,1,0,1
  652. 6570 DATA020,000,000,028,049,007,233,1,0,0
  653. 6580 DATA020,042,062,028,049,007,233,1,0,1
  654. 6590 DATA020,037,162,028,049,007,233,0,0,1
  655. 6600 DATA020,037,162,028,049,007,233,1,0,1
  656. 6610 DATA020,037,162,028,049,007,233,1,0,0
  657. 6620 DATA020,037,162,028,049,007,233,1,0,1
  658. 6630 DATA020,035,134,028,049,007,233,1,0,1
  659. 6640 REM MEASURE 80
  660. 6650 DATA020,037,162,028,049,007,233,0,0,1
  661. 6660 DATA020,037,162,028,049,007,233,1,0,0
  662. 6670 DATA020,035,134,028,049,007,233,1,0,1
  663. 6680 DATA020,037,162,028,049,007,233,1,0,1
  664. 6690 DATA020,037,162,028,049,007,233,0,0,1
  665. 6700 DATA020,037,162,028,049,007,233,0,0,0
  666. 6710 DATA020,042,062,028,049,007,233,1,0,1
  667. 6720 DATA020,042,062,028,049,007,233,0,1,1
  668. 6730 REM MEASURE 81
  669. 6740 DATA020,042,062,000,000,006,071,0,1,1
  670. 6750 DATA020,042,062,000,000,007,012,1,1,0
  671. 6760 DATA020,000,000,042,062,007,012,1,1,1
  672. 6770 DATA020,000,000,037,162,007,012,1,0,1
  673. 6780 DATA020,000,000,037,162,007,012,1,0,1
  674. 6790 DATA020,000,000,037,162,007,012,1,1,0
  675. 6800 DATA020,000,000,037,162,007,012,1,1,1
  676. 6810 DATA020,000,000,035,134,007,012,1,1,1
  677. 6820 REM MEASURE 82
  678. 6830 DATA020,000,000,037,162,006,071,1,1,1
  679. 6840 DATA020,000,000,035,134,007,012,1,1,0
  680. 6850 DATA020,000,000,028,049,007,012,1,0,1
  681. 6860 DATA020,000,000,028,049,007,012,1,0,1
  682. 6870 DATA020,000,000,028,049,007,012,1,0,1
  683. 6880 DATA020,000,000,028,049,007,012,1,1,0
  684. 6890 DATA020,042,062,000,000,007,012,1,1,1
  685. 6900 DATA020,042,062,000,000,007,012,0,1,1
  686. 6910 REM MEASURE 83
  687. 6920 DATA020,042,062,000,000,005,237,0,1,1
  688. 6930 DATA020,042,062,000,000,005,237,1,1,0
  689. 6940 DATA020,000,000,042,062,005,237,1,1,1
  690. 6950 DATA020,000,000,037,162,005,237,1,0,1
  691. 6960 DATA020,000,000,037,162,005,237,1,0,1
  692. 6970 DATA020,000,000,037,162,005,237,1,1,0
  693. 6980 DATA020,000,000,037,162,005,237,1,1,1
  694. 6990 DATA020,000,000,035,134,005,237,1,1,1
  695. 7000 REM MEASURE 84
  696. 7010 DATA020,000,000,037,162,005,237,1,1,1
  697. 7020 DATA020,000,000,035,134,005,237,1,1,0
  698. 7030 DATA020,000,000,028,049,005,237,1,0,1
  699. 7040 DATA020,000,000,028,049,005,237,1,0,1
  700. 7050 DATA020,000,000,028,049,005,237,1,0,1
  701. 7060 DATA020,000,000,028,049,005,237,1,1,0
  702. 7070 DATA020,042,062,000,000,005,237,1,1,1
  703. 7080 DATA020,042,062,000,000,005,237,0,1,1
  704. 7090 REM MEASURE 85
  705. 7100 DATA020,042,062,000,000,004,180,0,1,1
  706. 7110 DATA020,042,062,000,000,004,180,1,1,0
  707. 7120 DATA020,000,000,042,062,004,180,1,1,1
  708. 7130 DATA020,000,000,037,162,004,180,1,0,1
  709. 7140 DATA020,000,000,037,162,004,180,1,0,1
  710. 7150 DATA020,000,000,037,162,004,180,1,1,0
  711. 7160 DATA020,000,000,037,162,004,180,1,1,1
  712. 7170 DATA020,000,000,035,134,004,180,1,1,1
  713. 7180 REM MEASURE 86
  714. 7190 DATA020,000,000,037,162,004,180,1,1,1
  715. 7200 DATA020,000,000,035,134,004,180,1,1,0
  716. 7210 DATA020,000,000,028,049,004,180,1,0,1
  717. 7220 DATA020,000,000,028,049,004,180,1,0,1
  718. 7230 DATA020,000,000,028,049,004,180,1,0,1
  719. 7240 DATA020,000,000,028,049,004,180,1,1,0
  720. 7250 DATA020,042,062,000,000,004,180,1,1,1
  721. 7260 DATA020,042,062,000,000,004,180,0,1,1
  722. 7270 REM MEASURE 87
  723. 7280 DATA020,042,062,000,000,003,244,0,1,1
  724. 7290 DATA020,042,062,000,000,003,244,1,1,0
  725. 7300 DATA020,000,000,042,062,003,244,1,1,1
  726. 7310 DATA020,000,000,037,162,003,244,1,0,1
  727. 7320 DATA020,000,000,037,162,003,244,1,1,1
  728. 7330 DATA020,000,000,035,134,003,244,1,1,0
  729. 7340 DATA020,000,000,037,162,003,244,1,1,1
  730. 7350 DATA020,000,000,035,134,003,244,1,1,1
  731. 7360 REM MEASURE 88
  732. 7370 DATA020,000,000,000,000,003,244,1,1,1
  733. 7380 DATA020,000,000,028,049,003,244,1,1,0
  734. 7390 DATA020,000,000,042,062,003,244,1,1,1
  735. 7400 DATA020,000,000,037,162,003,244,1,0,1
  736. 7410 DATA020,000,000,037,162,003,244,1,1,1
  737. 7420 DATA020,000,000,035,134,003,244,1,0,0
  738. 7430 DATA020,042,062,035,134,003,244,1,1,1
  739. 7440 DATA020,042,062,037,162,003,244,0,0,1
  740. 7450 REM MEASURE 89
  741. 7460 DATA040,042,062,037,162,014,024,1,0,0
  742. 7470 DATA100,000,000,037,162,014,024,1,0,0
  743. 7480 DATA020,028,049,037,162,014,024,1,1,0
  744. 7490 REM MEASURE 90
  745. 7500 DATA020,028,049,021,031,014,024,1,0,0
  746. 7510 DATA020,031,165,021,031,014,024,1,0,0
  747. 7520 DATA020,026,156,021,031,014,024,1,0,0
  748. 7530 DATA020,028,049,021,031,014,024,1,0,0
  749. 7540 DATA040,031,165,021,031,014,024,1,1,0
  750. 7550 DATA020,042,062,021,031,014,024,1,1,0
  751. 7560 DATA020,042,062,021,031,014,024,0,0,1
  752. 7570 REM MEASURE 91
  753. 7580 DATA040,042,062,021,031,014,024,1,0,0
  754. 7590 DATA020,000,000,021,031,014,024,1,0,0
  755. 7600 DATA040,035,134,021,031,014,024,1,0,0
  756. 7610 DATA040,035,134,021,031,014,024,1,0,0
  757. 7620 DATA020,033,135,021,031,014,024,1,0,0
  758. 7630 REM MEASURE 92
  759. 7640 DATA020,035,134,021,031,014,024,1,0,0
  760. 7650 DATA020,031,165,021,031,014,024,1,0,0
  761. 7660 DATA040,028,049,021,031,014,024,1,0,0
  762. 7670 DATA040,000,000,021,031,014,024,1,1,0
  763. 7680 DATA020,042,062,021,031,014,024,1,1,0
  764. 7690 DATA020,042,062,023,181,014,024,0,0,1
  765. 7700 REM MEASURE 93
  766. 7710 DATA040,042,062,023,181,011,218,1,0,0
  767. 7720 DATA040,031,165,023,181,011,218,1,0,0
  768. 7730 DATA020,028,049,023,181,011,218,1,0,0
  769. 7740 DATA040,026,156,023,181,011,218,1,0,0
  770. 7750 DATA020,028,049,023,181,011,218,0,0,0
  771. 7760 REM MEASURE 94
  772. 7770 DATA040,028,049,023,181,011,218,1,0,0
  773. 7780 DATA040,000,000,023,181,011,218,1,0,0
  774. 7790 DATA040,000,000,023,181,011,218,1,1,0
  775. 7800 DATA020,042,062,021,031,011,218,1,1,0
  776. 7810 DATA020,042,062,028,049,011,218,0,0,1
  777. 7820 REM MEASURE 95
  778. 7830 DATA040,042,062,028,049,009,104,1,0,0
  779. 7840 DATA020,000,000,028,049,009,104,1,0,0
  780. 7850 DATA020,015,210,028,049,009,104,1,0,0
  781. 7860 DATA020,031,165,028,049,009,104,1,1,0
  782. 7870 DATA040,031,165,028,049,009,104,1,1,0
  783. 7880 DATA020,037,162,028,049,009,104,0,0,0
  784. 7890 REM MEASURE 96
  785. 7900 DATA120,037,162,028,049,009,104,1,1,0
  786. 7910 DATA020,042,062,000,000,009,104,1,1,0
  787. 7920 DATA020,044,193,033,135,009,104,0,0,1
  788. 7930 REM MEASURE 97
  789. 7940 DATA020,022,096,016,195,002,163,0,0,1
  790. 7950 DATA020,022,096,016,195,002,204,1,1,0
  791. 7960 DATA020,000,000,011,048,002,204,1,1,1
  792. 7970 DATA020,000,000,014,024,002,204,1,1,1
  793. 7980 DATA020,000,000,016,195,002,204,1,0,1
  794. 7990 DATA020,000,000,016,195,002,204,1,1,0
  795. 8000 DATA020,000,000,014,024,002,204,1,1,1
  796. 8010 DATA020,000,000,014,239,002,204,1,0,1
  797. 8020 REM MEASURE 98
  798. 8030 DATA020,000,000,014,239,002,163,1,1,1
  799. 8040 DATA020,000,000,014,024,002,204,1,1,0
  800. 8050 DATA020,000,000,016,195,002,204,1,0,1
  801. 8060 DATA020,000,000,016,195,002,204,1,0,1
  802. 8070 DATA020,000,000,016,195,002,204,1,0,1
  803. 8080 DATA020,000,000,016,195,002,204,1,1,0
  804. 8090 DATA020,021,031,000,000,002,204,1,1,1
  805. 8100 DATA020,022,096,016,195,002,204,0,0,1
  806. 8110 REM MEASURE 99
  807. 8120 DATA020,022,096,016,195,002,163,0,0,1
  808. 8130 DATA020,022,096,016,195,002,204,1,1,0
  809. 8140 DATA020,000,000,022,096,002,204,1,1,1
  810. 8150 DATA020,000,000,016,195,002,204,1,0,1
  811. 8160 DATA020,000,000,016,195,002,204,1,1,1
  812. 8170 DATA020,000,000,016,195,002,204,1,1,0
  813. 8180 DATA020,000,000,014,239,002,204,1,1,1
  814. 8190 DATA020,000,000,014,024,002,204,1,1,1
  815. 8200 REM MEASURE 100
  816. 8210 DATA020,000,000,014,239,002,163,1,1,1
  817. 8220 DATA020,000,000,014,024,002,204,1,1,0
  818. 8230 DATA020,000,000,011,048,002,204,1,0,1
  819. 8240 DATA020,000,000,011,048,002,204,1,0,1
  820. 8250 DATA020,000,000,011,048,002,204,1,0,1
  821. 8260 DATA020,000,000,011,048,002,204,1,1,0
  822. 8270 DATA020,021,031,000,000,002,204,1,1,1
  823. 8280 DATA020,022,096,016,195,002,204,0,0,1
  824. 8290 DATA-05
  825. 8300 REM MEASURE 97
  826. 8310 DATA020,022,096,016,195,002,163,0,0,1
  827. 8320 DATA020,022,096,016,195,002,204,1,1,0
  828. 8330 DATA020,000,000,011,048,002,204,1,1,1
  829. 8340 DATA020,000,000,014,024,002,204,1,1,1
  830. 8350 DATA020,000,000,016,195,002,204,1,0,1
  831. 8360 DATA020,000,000,016,195,002,204,1,1,0
  832. 8370 DATA020,000,000,014,024,002,204,1,1,1
  833. 8380 DATA020,000,000,014,239,002,204,1,0,1
  834. 8390 REM MEASURE 98
  835. 8400 DATA020,000,000,014,239,002,163,1,1,1
  836. 8410 DATA020,000,000,014,024,002,204,1,1,0
  837. 8420 DATA020,000,000,016,195,002,204,1,0,1
  838. 8430 DATA020,000,000,016,195,002,204,1,0,1
  839. 8440 DATA020,000,000,016,195,002,204,1,0,1
  840. 8450 DATA020,000,000,016,195,002,204,1,1,0
  841. 8460 DATA020,021,031,000,000,002,204,1,1,1
  842. 8470 DATA020,022,096,016,195,002,204,0,0,1
  843. 8480 REM MEASURE 99
  844. 8490 DATA020,022,096,016,195,002,163,0,0,1
  845. 8500 DATA020,022,096,016,195,002,204,1,1,0
  846. 8510 DATA020,000,000,022,096,002,204,1,1,1
  847. 8520 DATA020,000,000,016,195,002,204,1,0,1
  848. 8530 DATA020,000,000,016,195,002,204,1,1,1
  849. 8540 DATA020,000,000,016,195,002,204,1,1,0
  850. 8550 DATA020,000,000,014,239,002,204,1,1,1
  851. 8560 DATA020,000,000,014,024,002,204,1,1,1
  852. 8570 REM MEASURE 100
  853. 8580 DATA020,000,000,014,239,002,163,1,1,1
  854. 8590 DATA020,000,000,014,024,002,204,1,1,0
  855. 8600 DATA020,000,000,011,048,002,204,1,0,1
  856. 8610 DATA020,000,000,011,048,002,204,1,0,1
  857. 8620 DATA020,000,000,011,048,002,204,1,0,1
  858. 8630 DATA020,000,000,011,048,002,204,1,1,0
  859. 8640 DATA020,021,031,000,000,002,204,1,1,1
  860. 8650 DATA020,022,096,016,195,002,204,0,0,1
  861. 8660 DATA-05
  862. 8670 REM MEASURE 97
  863. 8680 DATA020,022,096,016,195,002,163,0,0,1
  864. 8690 DATA020,022,096,016,195,002,204,1,1,0
  865. 8700 DATA020,000,000,011,048,002,204,1,1,1
  866. 8710 DATA020,000,000,014,024,002,204,1,1,1
  867. 8720 DATA020,000,000,016,195,002,204,1,0,1
  868. 8730 DATA020,000,000,016,195,002,204,1,1,0
  869. 8740 DATA020,000,000,014,024,002,204,1,1,1
  870. 8750 DATA020,000,000,014,239,002,204,1,0,1
  871. 8760 REM MEASURE 98
  872. 8770 DATA020,000,000,014,239,002,163,1,1,1
  873. 8780 DATA020,000,000,014,024,002,204,1,1,0
  874. 8790 DATA020,000,000,016,195,002,204,1,0,1
  875. 8800 DATA020,000,000,016,195,002,204,1,0,1
  876. 8810 DATA020,000,000,016,195,002,204,1,0,1
  877. 8820 DATA020,000,000,016,195,002,204,1,1,0
  878. 8830 DATA020,021,031,000,000,002,204,1,1,1
  879. 8840 DATA020,022,096,016,195,002,204,0,0,1
  880. 8850 REM MEASURE 99
  881. 8860 DATA020,022,096,016,195,002,163,0,0,1
  882. 8870 DATA020,022,096,016,195,002,204,1,1,0
  883. 8880 DATA020,000,000,022,096,002,204,1,1,1
  884. 8890 DATA020,000,000,016,195,002,204,1,0,1
  885. 8900 DATA020,000,000,016,195,002,204,1,1,1
  886. 8910 DATA020,000,000,016,195,002,204,1,1,0
  887. 8920 DATA020,000,000,014,239,002,204,1,1,1
  888. 8930 DATA020,000,000,014,024,002,204,1,1,1
  889. 8940 REM MEASURE 100
  890. 8950 DATA020,000,000,014,239,002,163,1,1,1
  891. 8960 DATA020,000,000,014,024,002,204,1,1,0
  892. 8970 DATA020,000,000,011,048,002,204,1,0,1
  893. 8980 DATA020,000,000,011,048,002,204,1,0,1
  894. 8990 DATA020,000,000,011,048,002,204,1,0,1
  895. 9000 DATA020,000,000,011,048,002,204,1,1,0
  896. 9010 DATA020,021,031,000,000,002,204,1,1,1
  897. 9020 DATA040,022,096,016,195,002,204,0,0,1
  898. 9030 DATA000
  899. 9040 PRINT"[147]":POKE53280,254:POKE53281,246:PRINTCHR$(9):PRINTCHR$(142)
  900. 9050 PRINT"            PRODUCED IN 1984"
  901. 9060 PRINT"            D.B. PRODUCTIONS[154]"
  902. 9070 I=55795:J=55796:L=55875:M=55876
  903. 9080 FORK=1TO20
  904. 9090 FORPA=1TO150:NEXT
  905. 9100 POKEI,12:POKEJ,12:POKEL,1:POKEM,1
  906. 9110 I=I-1:J=J+1:L=L-1:M=M+1
  907. 9120 NEXTK
  908. 9130 END
  909.